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'* 1. productive class : 

* deflnation 

class OPERATIONS definition, 
public section, 
class-methods: 
ADD importing A type I 
B type I 

returning VALUE (RESULT) type I. 

endclass. 

>». 

* implementation 

class OPERATIONS implementation. 

method ADD. 

RESULT = A + B. 

endmethod. 
endclass. 



* 2. test class: 

* definition 



183 



class TEST_OPERATIONS definition for testing. 

pubhc section. ^ 

methods TEST_ADI\for testing^ 
endclass. ■ — 
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* implementation 

class TESTJDPERATIONS implementation, 
method TEST_ADD. 

* test data: variable needed to store the result from the productive method 
data: ACTUALJRESULT type I. 



18b' 



call the method under test: . 
ACTUAL RESULT = OPERATIONS =t> ADD 



A = 3 B = 5). 



compare the result mtla^th c cxpoo te 
CL_AUNIT_ASSER3K>ASSERT_EQUALS ' 

ACT = ACTUALVRESULT 
EXP = 8 

MSG = 'this is the message which occurs if the test failed' 



) 

endmethod. 
endclass. 
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A. 

AS SERT_EQU ALS ( ACT = ACTUAL RESULT 

EXP = EXPECTEDRESULT 
MSG = 'this test has failed' 
QUIT = QUITVALUE ). 



57 



Where QUIT VALUE defines at which level the test flow 
should be interupted: 

- NO: continue the current test method. 

- METHOD: interrupt the current test method. 

- CLASS: interrupt the test class execution. 

- PROGRAM: abandon all test class executions of the 
currently tested program frame. 



FIG. 4 
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